home *** CD-ROM | disk | FTP | other *** search
/ Gold Medal Software 3 / Gold Medal Software - Volume 3 (Gold Medal) (1994).iso / music / 5mods_2.arj / APOLO14.MOD next >
Text File  |  1994-01-20  |  5KB  |  93 lines
  1. 30/137...... Apolo14.423 SysOp can send SSM to all or one from Main. v1.0
  2. Name........ /┤PΘ££Θ #1 @2938
  3. Date........ Mon Jan 03 03:42:39 1994
  4. From........ WWIVNet - Retreat of the Gods [209-537-2808] 
  5. Location.... Central California
  6.  
  7. ┌──────────────────────────────────────────────────────Filo─Header─(c)────┐
  8. │ Mod Name: Apollo14.423  Mod Authors: Apollo  1@92938 WWIVNet & BRNet    │
  9. │ Difficulty: █▒▒▒▒▒▒▒▒▒               1@2939 TARDIS,TERRA,ICE & Mas Nets │
  10. │ WWIV Version: v4.23            Date: 12/09/93                           │
  11. │ Files Affected: BBS.C                                                   │
  12. │ SysOp can send SSM to all users, or just one, from mainmenu.            │
  13. └─────────────────────────────────────────────────────────────────────────┘
  14. Extended Description:
  15. adds //SSM and //SSM <username or number>
  16.  
  17. Updated for v4.23
  18.  
  19. LEGEND:
  20. = old code, Search for this
  21. + new code
  22. - Remove or comment out this line
  23. > Modified From Virgin Code
  24.  
  25. #include <witty disclaimer>
  26.  
  27. BACKUP your Source
  28.  
  29. Load up: BBS.C
  30. Find: void mainmenu(void)
  31. =    if (strcmp(s,"UEDIT")==0) {
  32. =      sysoplog(get_stringx(1,10));
  33. =      uedit(usernum,0);
  34. =    }
  35. +    if (strcmp(s,"SSM")==0) {                    /* Apollo14.423 */
  36. +      nl();                                      /* Apollo14.423 */
  37. +      nl();                                      /* Apollo14.423 */
  38. +      prt(2,"Send a short message to everyone? ");
  39. +                                                 /* Apollo14.423 */
  40. +      if (yn()) {                                /* Apollo14.423 */
  41. +        nl();                                    /* Apollo14.423 */
  42. +        prt(1,"Enter short message now.");       /* Apollo14.423 */
  43. +        nl();                                    /* Apollo14.423 */
  44. +        prt(2,": ");                             /* Apollo14.423 */
  45. +        mpl(70);                                 /* Apollo14.423 */
  46. +        ansic(4);                                /* Apollo14.423 */
  47. +        inputl(s1,70);                           /* Apollo14.423 */
  48. +        i=0;                                     /* Apollo14.423 */
  49. +        outstr("User:    ");                     /* Apollo14.423 */
  50. +        do {                                     /* Apollo14.423 */
  51. +          if(i%5==0)                             /* Apollo14.423 */
  52. +            npr("\b\b\b\b%4d",i);                /* Apollo14.423 */
  53. +          ssm(i,0,s1);                           /* Apollo14.423 */
  54. +          i++;                                   /* Apollo14.423 */
  55. +        } while ((i<=((status.users)+1)) && (!hangup));
  56. +                                                 /* Apollo14.423 */
  57. +        nl();                                    /* Apollo14.423 */
  58. +        npr("%d SSM's sent.",i);                 /* Apollo14.423 */
  59. +        nl();                                    /* Apollo14.423 */
  60. +      } else {                                   /* Apollo14.423 */
  61. +        pl("Unknown user.");                     /* Apollo14.423 */
  62. +        nl();                                    /* Apollo14.423 */
  63. +      }                                          /* Apollo14.423 */
  64. +    }                                            /* Apollo14.423 */
  65. +                                                 /* Apollo14.423 */
  66. +    if (strncmp(s,"SSM ",4)==0) {                /* Apollo14.423 */
  67. +        i=finduser1(&s[4]);                      /* Apollo14.423 */
  68. +      if (i>0) {                                 /* Apollo14.423 */
  69. +        prt(1,"Enter short message now.");       /* Apollo14.423 */
  70. +        nl();                                    /* Apollo14.423 */
  71. +        prt(2,": ");                             /* Apollo14.423 */
  72. +        mpl(70);                                 /* Apollo14.423 */
  73. +        ansic(4);                                /* Apollo14.423 */
  74. +        inputl(s1,70);                           /* Apollo14.423 */
  75. +        ssm(i,0,s1);                             /* Apollo14.423 */
  76. +        pl("SSM sent.");                         /* Apollo14.423 */
  77. +        nl();                                    /* Apollo14.423 */
  78. +      } else {                                   /* Apollo14.423 */
  79. +        pl("Unknown user.");                     /* Apollo14.423 */
  80. +        nl();                                    /* Apollo14.423 */
  81. +      }                                          /* Apollo14.423 */
  82. +    }                                            /* Apollo14.423 */
  83. =
  84. =  }
  85. =/**************************************************/
  86. =  if (cs()) {
  87.  
  88.  
  89. done.
  90.  
  91. Save, Recompile and run.
  92. As you can see, Not so hard!
  93.